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L'informatique a pris une place croissante à la S.N.C.F. Elle est 
particulièrement visible pour le client : depuis son domicile, 
il peut réserver sa place de train. 


Réservation à domicile 
La réservation 
électronique des places à 
la S.N.C.F. existe depuis 
1973 à partir des gares. 
Mais, dès cette année, 
les possesseurs de 
Minitel pourront le faire 
directement de chez eux, 
enfin. certains d’entre 
eux. 


Avant tout service public, mais aussi entreprise 
commerciale, la Société nationale des chemins de 
fer français (S.N.C.F.) est présente sur l’ensem- 
ble du marché des transports, tant voyageurs que 
marchandises. Si sa principale raison d’être est 
l’exploitation des lignes de chemin de fer, son 
activité s’étend aussi, par l’intermédiaire de ses 
filiales, à des domaines connexes tels que la ges- 
tion d’hôtels, le tourisme, le camionnage, etc. 
Elle dispose également d’un patrimoine impor- 
tant comprenant voies, gares, triages, ateliers de 
réparation, installations de signalisation et de 
télécommunication, matériels roulants, équipe- 
ments sociaux. 

On conçoit qu’une telle entreprise, qui utilise 
pour son fonctionnement une main-d'œuvre et 
un matériel importants, et dont les établissements 
sont nombreux et dispersés, ait recours, pour 
gérer son activité, aux outils informatiques les 
plus modernes et les mieux adaptés du moment. 

L'organisation informatique tient compte de 
la nature des applications mises en œuvre. Elle 
se répartit en trois domaines : l’informatique de 
gestion, à laquelle sont rattachés les calculs scien- 
tifiques et techniques et leurs traitements dérivés 
(conception, fabrication et enseignement assistés 


par ordinateur, infographie, etc.); l’informa- 
tique des processus industriels; et enfin la 
bureautique. 

Ainsi, les équipements informatiques ont été 
largement utilisés pour les études de conception 
du TGV et la création de la ligne nouvelle Paris- 
Sud-Est. Ils le seront également pour les études 
de réalisation du TGV-Atlantique. 


L'informatique de gestion 


Parmi les applications de gestion dont est res- 
ponsable la direction de l’informatique de la 
S.N.C.F., on peut distinguer deux catégories. 
Premièrement, les applications de gestion cou- 
rante, comme celles de beaucoup d’entreprises, 
concernent notamment des tâches administra- 
tives à caractère répétitif (solde du personnel, 
comptabilité, etc.). Deuxièmement, les applica- 
tions de gestion opérationnelles sont directement 
liées à l’activité de transport de la S.N.C.F. 
De ces dernières applications, les deux plus 
importantes sont la gestion centralisée du trafic 
marchandises (G.C.T.M.) et la réservation élec- 
tronique des places (RESA). Nous nous intéres- 
serons plus particulièrement à cette dernière 
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Au guichet 

Pour le candidat au 
voyage qui se déplace à 
la gare, la réservation 
peut être faite en 
quelques minutes grâce 
à l'interrogation en temps 
réel de l'ordinateur 
central. Cette liaison 
permet un gain de temps 
appréciable. À condition 
que la file d'attente ne 
soit pas trop longue... 
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application dans la seconde partie de cet article. 
Le transport des marchandises par wagons 
complets, du fait de l’importance du parc en ser- 
vice, des mouvements quotidiennement enregis- 
trés (15 000 wagons répartis entre 4 000 gares) 
est apparu justiciable d’une gestion centralisée 
par ordinateur. 

Mettant en œuvre le réseau de télé-informa- 
tique, la G.C.T.M. exploite, à partir de 1 200 ter- 
minaux, les informations recueillies lors de cha- 
que mouvement de wagon. Les traitements infor- 
matiques couvrent le transport (suivi des 
wagons), composition des trains, préavis d’arri- 
vée, etc.), le commercial (facturation et comp- 
tabilisation des frais, répartition des wagons 
vides, etc.) et le matériel (gestion des fichiers du 
matériel, inventaire permanent du parc et de l’uti- 
lisation des wagons, déclenchement des opéra- 
tions d’entretien, etc.). 

Concevoir une application informatique néces- 
site de répondre à un certain nombre de ques- 
tions, certaines liées à des choix d’organisation 
du travail, d’autres à des choix techniques. Il en 
découle une « architecture » : ordinateurs de trai- 
tement, stockage des données, réseaux de trans- 
mission, postes de travail incluant les opérateurs, 
les terminaux, les documents. 


La réservation électronique 


Expérimentée dès le début des années soixante- 
dix et mise en service à la fin de 1973, la réser- 
vation électronique des places (RESA) couvre 
maintenant la presque totalité des prestations 
offertes aux voyageurs : places assises, couchet- 
tes, voitures-lits, repas à la place ou en voitures- 
restaurants, trains-autos et motos accompagnées. 

Les informations nécessaires au fonctionne- 
ment de la réservation sont notamment : les jours 
de circulation des trains, les gares desservies, les 
heures d’arrivée et de départ, les tarifs, les 
schémas-voitures composant ces trains et les places 
qui y sont déjà réservées avec leur parcours de 
réservation. 


La procédure de réservation consiste à attri- 
buer à un client demandeur, au guichet d’une 
gare, dans une agence de voyage ou par télé- 
phone, une place dans un train correspondant à 
sa demande. 

Les souhaits particuliers de la clientèle, tels que 
fumeur ou non fumeur, position fenêtre ou cou- 
loir en places assises, inférieure ou supérieure en 
couchettes ou voitures-lits, sont également satis- 
faits dans la mesure des disponibilités. 

La S.N.C.F. a choisi de faire de la RESA un 
système centralisé sur un seul site, Batignolles, 
où sont regroupés les données et les traitements. 
Par ailleurs, les terminaux sont largement distri- 
bués surtout leterritoire, dans les gares moyennes 
et grandes, ainsi que dans les agences de voya- 
ges assez importantes. Au départ, ces terminaux 
étaient soit entièrement passifs (Olivetti), soit dis- 
posant d’une aide par projection de diapositives 
(IBM). Ils étaient reliés à l’ordinateur central par 
le réseau de télé-informatique de la S.N.C.F. à 
basse vitesse (110 à 150 bauds). 

A la fin des années soixante-dix, l’apparition 
de terminaux dits « intelligents », c’est-à-dire 
ayant des possibilités locales de stockage de don- 
nées et d’exécution de traitements, a permis le 
développement de nouveaux terminaux. 

En particulier, en 1981, la réservation dans le 
T.G.V. a nécessité la mise en œuvre de procé- 
dures spéciales et l’implantation de distributeurs 
de «réservation rapide », en libre service, connec- 
tés à l’ordinateur central. Ceux-ci assurent loca- 
lement le dialogue avec les clients du T.G.V., par 
affichage de textes et de questions, la délivrance 
du titre de réservation et la gestion du paiement 
en espèces. 

Une autre transformation qui a modifié l’archi- 
tecture initiale de la RESA a été l’évolution des 
réseaux de transmission de données. Les premiers 
réseaux, avec leur architecture « en étoile », 
étaient assez vulnérables. Dans les réseaux 
récents, le schéma des câbles est maillé : il y a 
plusieurs chemins possibles d’un « nœud » à un 
autre. Les caractères à transmettre sont groupés 
en « paquets » d’une centaine de caractères, cha- 
que paquet étant transmis par le chemin le meil- 
leur à l’instant de la transmission. Le nouveau 
réseau S.N.C.F., RETIF, en cours d’installa- 
tion, répond à ces critères, avec un objectif de 
1 200 bauds pour les terminaux RESA, permet- 
tant de transmettre un titre de réservation en qua- 
tre secondes seulement. TRANSPAC, le réseau 
public de transmission de données, mis en place 
à l'initiative des P.T.T. sur tout le territoire fran- 
çais, répond aux exigences de la S.N.C.F. 

Ainsi, les agences de voyages peuvent, au lieu 
de s’équiper de terminaux spécialisés, louer sim- 
plement un terminal banalisé, permettant d’accé- 
der, via TRANSPAC, aux différents systèmes de 
réservation (non seulement S.N.C.F., mais aussi 
Air Inter, Air France, UTA, S.N.C.M., clubs de 
vacances, tours opérators, chaînes d’hôtels, etc.). 
Il s’agit du projet ESTEREL (Ensemble spécia- 
lisé de tourisme et de réservation électronique), 
dont la première phase est opérationnelle depuis 
le début de l’année 1984. 


Agence de voyages à domicile 


Un nouveau mode de transmission apparaît 
aujourd’hui avec l’utilisation, non plus des 
réseaux spécialisés, mais des réseaux téléphoni- 
ques publics (P.T.T.) ou privés (S.N.C.F.) par 
le biais des Minitels, ces petits terminaux peu oné- 
reux, installés en masse chez les particuliers par 
IGS ET T. 

Tout possesseur d’un Minitel pourra, dès le 
milieu de 1985, réserver des places de façon ana- 
logue à la réservation par téléphone, en formu- 
lant directement sa demande à l’écran grâce au 
nouveau service : RESA-Télématique. 

De même, les professionnels (agents S.N.C.F., 
agents de voyages), dans les petites gares et les 
petites agences de voyages qui ne disposaient pas 
encore de terminal, profiteront de cette expan- 
sion du réseau S.N.C.F. : en adjoignant une 
machine « Mirabel » au Minitel, il sera possible 
d’obtenir une édition des réservations. On élimi- 
nera ainsi presque totalement les recopies 
manuelles de références de place, sources 
d’erreurs et de doubles réservations. 

En outre, des accords entre les différents 
réseaux de chemins de fer européens ont permis, 
au sein de l’Union internationale des chemins de 
fer (U.I.C.), de définir des échanges standardi- 
sés entre les différents ordinateurs de réservation 
européens. Les trains en réservation de onze pays 
européens sont ainsi accessibles par tout termi- 
nal de la RESA (Allemagne, Belgique, Luxem- 
bourg, Autriche, Pays-Bas, Danemark, Suisse, 
Italie, Espagne, Portugal et, bien sûr, la France), 
en attendant la Grande-Bretagne. 

Quinze ans après le début de la conception de 
la RESA, on mesure le chemin parcouru par les 
procédures de réservation, depuis les bureaux de 
réservation manuels gérant les schémas-voitures 
dans de grands classeurs à tambour, jusqu’à la 
réservation depuis son domicile dans le « Munich- 
Athènes ». 

Grâce à l’apparition des ordinateurs sur les gui- 
chets, le rôle des vendeurs est devenu encore plus 
important et plus efficace pour la S.N.C.F. 
Comme pour toute entreprise, l'informatique est 
là pour les aider dans leur tâche de vente et leur 
permettre de satisfaire les usagers, voyageurs et 
expéditeurs, au mieux et dans les meilleurs délais. 
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Gérer des wagons 

Il faut pas moins de 1 200 
terminaux pour gérer 
l'ensemble des wagons 
et leurs mouvements, et 
établir ainsi un suivi 
commercial et technique 
des matériels. 


Le marché 


Le nombre des transactions journalières 
pour le trafic voyageurs S.N:C.F. oscille 
entre 30 000 et 210 000. 

En période normale, 700 à 800 trains sont 
quotidiennement en réservation, ce qui 
constitue un fichier d'environ 40 millions 
de places gérées. En période de pointe, 
ce volume peut atteindre 60 millions de 
places pour un mouvement dépassant 

1 000 trains. 


Matériels et logiciels 


Le parc des équipements informatiques 
de la S.N.C.F., qui représente une valeur 
d'acquisition de 900 millions de francs et 
une capacité de 120 millions de caractères 
en mémoire centrale et 340 milliards de 
caractères en mémoire de masse, est très 
diversifié. 

ll se compose de matériels Bull, 
Burroughs, IBM, Sperry, Logabax, pour ne 
citer que les plus importants. A noter que, 
dans ce parc, la part du matériel français, 
actuellement 54 %, devrait atteindre 61 % 
à la mi-1985. 

Les logiciels écrits pour ces machines 
sont, pour les plus utilisés à la S.N.C-F., 
dans les langages suivants : PROTÉE, 
COBOL, PL1, FORTRAN. En outre, des 
langages proches de l'utilisateur final 
(langages « end user ») ont été récemment 
mis au point. lIs permettent à l'utilisateur, 
à partir de bases de données, la sélection 
et la manipulation d'informations, ce qui 
réduit d'autant les tâches à effectuer par 
les informaticiens. 
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Arbre analogique... 

En réorganisant les 
données sous forme 
hiérarchique, on obtient 
une structure en forme 
d'arbre, tout à fait 
comparable à celle d'un 
arbre généalogique. 

(CI. SNARK/EDIMEDIA.) 
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De bonnes relations 


Les logiciels de gestion de bases de données font généralement 
usage de méthodes dites « d'organisation relationnelle ». 
Voyons les principes de base de ce système. 


La plupart des « gestionnaires » de bases de don- 
nées sont du type « relationnel ». Cela signifie 
que chaque enregistrement d’un fichier prend la 
forme d’un tableau, constitué de lignes et de 
colonnes, un peu à la façon d’un tableur. L’infor- 
mation peut prendre des formes variées qui sug- 
gèrent des structures plus complexes. 

On emploie le terme « relationnel » parce que 
chaque « ligne » de la base de données est liée, 
de façon précise et sans ambiguïté, à chaque 
« colonne ». Ce n’est pas là une manière très sou- 
ple d’organiser les données, mais elle se révèle 
suffisante pour les plus simples des programmes 
de ce type. Les micro-ordinateurs domestiques 
— même les tout nouveaux modèles à 16 bits, dis- 
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posant de 128 K de mémoire ou plus — ont des 
capacités mémoire limitées; ils restent un peu 
lents pour ce qui est du stockage et du traitement 
de l’information. Les limites d’un système rela- 
tionnel représentent une part du prix à payer, dès 
lors qu’on veut pouvoir manipuler des bases de 
données à des conditions acceptables. 

Une méthode tout à fait différente de cette 
organisation « tabulaire » consiste à réorganiser 
les données sous forme hiérarchique. Elles pren- 
nent la forme d’un arbre; les branches ont des 
« sous-branches », qui ont elles-mêmes des 
rameaux, des feuilles, etc. 

Pour illustrer ce point de vue, nous allons cher- 
cher comment créer une base de données permet- 


Liz Dixon 


tant de traiter le stock d’un petit marchand de 
journaux-tabac. 


CATÉGORIE 


Représenté de façon hiérarchique, le tout aurait 
cette structure fondamentale : 


CATEGORIE 


D NS 


MARQUE 


D SS 


TAILLE 


D 


QUANTITÉ S 


Chaque enregistrement n’est pas organisé en 
« zones », mais en « fragments » de données, 
dont chacun peut correspondre à un ou plusieurs 
zones. Tout ce qui concerne les CIGARETTES, réor- 
ganisé hiérarchiquement, et non plus relationnel- 
lement, prendrait une forme de ce type : 


CGARETTES 


CATÉGORIE ! 
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Cela a le gros avantage de présenter chaque élé- 
ment d’information comme supérieur, ou subor- 
donné à un autre. Il suffit de disposer d’un 
« pointeur » qui renvoie d’un « segment » 
d’information à un autre. 

Supposons que notre détaillant n’ait en stock 
qu’une centaine de « catégories », mais qu’il pro- 
pose en revanche près d’un millier de produits 
différents. Avec une base de données de type rela- 
tionnel, nous aurions besoin de mille enregistre- 
ments, à raison de un par article. Un système de 
type hiérarchique permet de simplifier la présen- 
tation et de ne mettre en jeu que les cent catégo- 
ries. Cela évite bien des répétitions fastidieuses, 
mais, il est vrai, donne à la base de données une 
organisation assez complexe. 


Il existe encore un autre procédé, appelé 
CODASYL ou système en réseau. Ce type d’organi- 
sation des données a été mis au point par un 
groupe de recherche spécialisé du Conference on 
Data Systems Languages — d’où le nom. Le gros 
problème de la méthode hiérarchique est que 
l'information ne peut être organisée que dans un 
seul « sens »; pour reprendre notre analogie arbo- 
ricole, une branche ne peut, par exemple, être rat- 
tachée à deux troncs différents. Or, c’est là un 
problème qui se pose quotidiennement. Pour en 
revenir à notre détaillant, CHIQUITO sera à la fois 
relié à SEITA et à CIGARES. Un même « élément » 
peut avoir plus d’un « créateur ». Par exemple, 
du point de vue du client, un pare-chocs est sim- 
plement une pièce automobile. Pour un garagiste, 
les choses sont moins évidentes; il doit aussi tenir 
compte de son origine. 

Dans le système CODASYL, on fait usage d’un 
réseau d’ensembles (un peu au sens mathémati- 
que), dont chacun se compose d’un certain nom- 
bre d’enregistrements. Les dimensions de ceux- 
ci n’ont pas besoin d’être fixes (comme dans les 
bases de données relationnelles), et ils peuvent au 
besoin faire partie de plusieurs ensembles en 
même temps. Ceux-ci peuvent également se 
réduire à un seul enregistrement, tandis que ce 
dernier ne peut appartenir simultanément à plus 
d’une seule occurrence du même type d’ensem- 
ble. Il s’ensuit que des structures de ce genre ne 


sont pas envisageables : 
CATEGORIE 4 


C’est là une limitation assez gênante. Il est vrai 
que l’on a assez peu de chances de voir un arti- 
cle qui soit à la fois une REVUE, une BOISSON et une 
marque de CIGARETTES. Mais c’est parfaitement 
concevable pour une entreprise : 


RENAULT 
SNS - 


SUPERCAR S.A 


Les bases de données de type hiérarchique ou en 
réseau sont bien plus souples que les modèles rela- 
tionnels, mais cette flexibilité a pour contre- 
partie une complexité qui ne les rend vraiment 
compétitives que sur mini-ordinateurs ou gros 
systèmes. Les ordinateurs personnels, quant à 
eux, mettent en œuvre, presque invariablement, 
des procédures de gestion relationnelles. On est 
donc amené, un jour ou l’autre, à faire face à 
la situation suivante : vous vendez certains arti- 
cles (que ce soit des livres ou autre chose), et cha- 
cun d’eux a des fournisseurs différents. Il faut 
donc à la fois un relevé des articles, et une série 
d’enregistrements consacrés à tous ceux qui pro- 
curent le même élément. 
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Langage machine 


Lignes d'échanges 


Nous allons voir comment les deux puces CIA 6526 du C64 contrôlent 
les E/S selon le programme Parawedge destiné à envoyer ou recevoir 
un bloc mémoire spécifié par le port utilisateur. 


Entrée de Parawedge 

Nous donnons un listage 
en code d'assemblage pour 
Parawedge, qui peut être 
entré et assemblé avec un 
assembleur. 

Le programme peut 
également être entré sous 
forme d'une série de DATA 
en tapant et en exécutant 
le code chargeur Basic. 
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Le Commodore 64 a deux puces CIA (adapta- 
teur d’interface complexe) 6526, qui sont dédiées 
aux communications avec le monde extérieur. Ce 
ne sont pas les seules puces en rapport avec les 
entrées/sorties ; les puces 6510 et vidéo manipu- 
lent, elles aussi, certaines E/S. Une puce 6526 a 
deux ports de données 8 bits, tous deux ayant des 
lignes programmables. La puce est adaptée à la 
communication 8 ou 16 bits, et elle a deux hor- 
loges 16 bits pouvant être couplées. De plus, elle 
a un registre de décalage 8 bits pour la commu- 
nication série et, comme nous l’avons vu, une 
horloge programmable donnant l’heure du jour. 

Elle a aussi deux lignes spécifiques d’entrée en 
communication — PC et Drapeau. PC décroi- 
tra d’un cycle après avoir écrit une donnée au 
port B de la 6526, et peut servir à indiquer qu’elle 
est prête à recevoir des données d’un dispositif 
externe. La ligne Drapeau peut servir d’entrée de 
contrôle à partir d’un autre appareil. Elle peut 
être utilisée pour mettre le bit Drapeau dans le 
registre d’interruption, et — ainsi validée — pro- 
voque une interruption NM au processeur 6510. 

Sur le C64, les deux puces 6526 manient diffé- 
rents aspects d’E/S : l’une d’elles (CIA#l, avec 
adresse de base en $DCW) est consacrée au clavier 
et aux manches à balais, tandis que l’autre 
(CIA#, avec adresse de base en $DD(0) contrôle les 
données sur les ports série et utilisateur. La puce 
vidéo manipule les E/S vers le moniteur, et le port 
cassette est directement manié par le 6510. 

Le programme Parawedge que nous donnons 
ici illustre clairement les étapes nécessaires pour 
programmer directement le 6526 pour les E/S. 
La routine est un « coin » NM! qui utilise la ligne 
Drapeau. Elle est destinée à envoyer un bloc spé- 
cifié de mémoire du port utilisateur sous forme 
de données en parallèle, ou bien à recevoir des 
données parallèles jusqu’à ce qu’un bloc spéci- 
fié de mémoire soit plein. Puisque c’est un code 
« coin », elle synchronisera les données en entrée 
ou en sortie sur les NMI, en laissant la machine 
libre de mener à bien d’autres tâches. Le seul hic 
est que, si le débit devient trop élevé, le C64 pas- 
sera tout son temps en routines de service NM, ce 
qui pourrait être extrêmement fâcheux. 

Parawedge permet au C64 d’établir des com- 
munications bilatérales parallèles 8 bits avec un 
appareil extérieur — par exemple un autre ordi- 
nateur ou une imprimante parallèle — par le port 
utilisateur. Les broches du port utilisateur de PBO 
à PB7 servent au transfert de données; la bro- 
che Drapeau 2 sert comme entrée en communi- 
cation; PA2 signale une condition « prêt pour 


données » et PC2 une condition « données 
valides ». Pour utiliser le programme, il faut 
d’abord définir une zone de RAM à partir de 
laquelle vous voulez envoyer les données en sor- 
tie, ou vers laquelle vous voulez recevoir les don- 
nées en entrée. Cela se fait en passant les adres- 
ses de début et de fin (sous forme octet lo/octet 
hi) vers le programme, en POKEant celles-ci dans 
les quatre emplacements de 50768 à 50771. 

L'emplacement 50772 sert à indiquer si le pro- 
gramme doit sortir ou entrer des données. POKEr 
un 1 dans cet emplacement met le programme en 
mode sortie, et un 0 en mode entrée. Après avoir 
fixé ces paramètres, le code « coin » est lancé par 
SYS 50775. Étant donné que le programme est 
commandé par interruptions, il fonctionne non 
prioritairement, envoyant ou recevant des don- 
nées, tandis qu’un programme BASIC est tapé ou 
exécuté prioritairement. 


Programme Parawedge 
Commodore 64 


Chargeur basic 


1000 REM #* CHARGEUR BASIC PARAWEDGE #4 


1999 REM 


181€ 


1a2a 


103€ 


Listage d'assemblage 


3H DD OO D DD DO OO 
3 

Le PARAWNEDGE — UN PROGRAMME COIN 

LL] 

POUR L'ENVOI ET LA RECEPTION DE COMMUNICATIONS 

+ 

LL PARALLELES 8 BITS SUR CBM 64 

3 


3 OH HE DD DH HE DD DDR DD ED D D 


CIAe = #0D00 :6526 CHIP BASE ADDR 
OUTPUT = $FF 
INPUT = $00 
OUTSHK = #24 
INTMSK = +90 
TOGHI = #24 
TOGLO = $FC 
NMIVEC = $0318 
ZPTEMP = #FB 

* = $C650 
START *x=#+2 
END *x=*X+e 
MODE *x=*%x+1 
VECTOR *x=4+2 


3START ADDRESS 

*END ADDRESS 

3 INPUT/OUTPUT FLAG 
STORAGE FOR NMI VECTOR 


PXTIN 
LOA 
BIT 
BEG 


HINTMSK 
CIAe+13 
NOTCOM 


:OK BYTE ON PORT 


LDA 
STA 
INC 
BNE 
INC 


TESTI 
LDRA 
CMP 
LDA 
E1:18 
Bcc 


CiAaet#i 
(ZPTEMP),Y 
ZPTEMP 
TESTI 
ZPTEMP+1 


END 
ZPTEMP 
END+1 
ZPTEMP+1 
OONE 


Langage machine 


CHECK ICR 
INT CAUSED BY FLAG? 
:NO.. NORMAL NMI 


*READ BYTE 
STORE IN MEMORY 


? INCREMENT POINTER 


*CHECK TO SEE IF ENDED 


#BRANCH IF FINISHED 


: TFLL DEVICE READY FOR NEXT BYTE 


cine 
#TOGLO 
ciAe 
#TOGHI 


: TOGGLE PA2 LOW THEN HIGH 


? INPUT OR OUTPUT cie 


?BRANCH IF OUTPUT 


LOA MODE 
BNE OUTDAT 
LOA #INPUT 
STA CIA2+3 
LDA #INTMSK 
STA CIAe+13 
LDA CIAete 
ORA H#OUTSHK 
STA CIiAet+e 
LDA CIAe 
ORA #TOGHI 
STA CIAe 
LDA START 
STA ZPTEMP 
LOA START+1 
STA ZPTEMP+1 


DO NORMAL NMI ROUTINE 
*SET DDR FOR INPUT 


NOTCOM 


; S 
FLAG INTERRUPTS DISABLED MP CVECTOR) 


SET PA FOR OUTPUT 


:SET HANOSHAKE LINE PA2 HIGH OUTPUT DATA SERVICE ROUTINE 


NXTOUT 
LOA #H#INTMSK 
BIT CIA2+13 
BEQ NOTCOM 


3MOVE POINTERS TO ZERO PAGE @ 
CHECK ICR 


? INTERRUPT CAUSED BY FLAG? 
INITIALISE INPUT :NO.. DQ NORMAL NMI 
LOA NMIVEC OK SEND BYTE 
STA VECTOR 
LDA NMIVEC+1 
STA VECTOR+1 
SEI 
LDA #CNXTIN 
STA NMIVEC 
LDA #>NXTIN 
STA NMIVEC+1 
CLI 
RTS 
; 
:INITIALISE OUTPUT WEDGE 
; 
QUTOAT 
LDA #OUTPUT 
STA CIAe+3 
LDA # INTMSK 
STA CIAE+13 


SAVE OLD NMI VECTOR 
LOA (ZPTEMP),Y 


STA CIAet+i 


GET BYTE FROM MEMORY 
?OUTPUT IT. PC WILL 60 
:LOW FOR 1 CYCLE 

INC ZPTEMP 


INSERT DATA-INPUT WEDGE BNE TESTE 
INC ZPTEMP +1 


? INCREMENT POINTER 


TESTS 
LD END 
CMP ZPTEMP 
LOA END+1 
SBC ZPTEMP+1 
BCC DONE 


3CHECK TO SEE IF ENDED 


3BRANCH IF DONE 


;SET DDR FOR OUTPUT CONTINUE NORMAL NMI ROUTINE 


:FLAG INTS DISABLED JMP_ CVECTOR) 


NMIVEC FINISHED REMOVE WEDGE 


VECTOR 
NMIVEC+1 
VECTOR+1 


SAVE OLD NMI VECTOR 
DORE 


SEI 

LOA VECTOR 
STA NMIVEC 
LDOA VECTOR+1 
STA NMIVEC+1 
CLI 

JMP CNMIVEC) 


#CNXTOUT 
NMIVEC 

#DNXTOUT 
NMIVEC +1 


*RESET NMI VECTOR TO 
#ORIGINAL VALUE 


INSERT DATA-OUTPUT WEDGE 


Ne se ve ve ve 


Parawedge, extrait de Mastering the Commodore 64 
par Jones et Carpenter, est reproduit avec 
l’aimable autorisation des auteurs et de 

Ellis Horwood Ltd. 


: INPUT DATA SERVICE ROUTINE 
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Test en cascade (11) | 


Nous avons déjà comparé entre elles une variable et une constante. | 
Nous poursuivons l’étude de ce test et introduisons 
un nouvel élément. 


Dans le premier test en cascade, nous avions pris 
comme exemple les jours de la semaine pour voir 
comment éliminer une comparaison; dans ce cas 
précis, elle découlait de la pure logique, puisque 
l’on savait qu’il n’y avait que sept jours dans la 
semaine. On peut donc réaliser la même opéra- 
tion avec les doigts de la main, ou les mois de 
l’année. Ces opérations sont possibles, car les 
exemples choisis appartiennent à quelques séries 
limitées dont le nombre d’éléments est déjà éta- 
bli et fixe; on voit immédiatement que, dans bien 
d’autres cas, il en ira tout différemment. 

Ainsi, nous arrivons à la conclusion qu’il est 
nécessaire de contrôler quelques valeurs détermi- 
nées mais variables, pour pouvoir éliminer une 
question parmi l’ensemble des autres. On devra 
donc inclure une question générale au début de 
la série pour que le renseignement introduit soit 
filtré convenablement avant d’être comparé. 

Nous développerons un exemple de deux 
façons différentes : la première est celle que nous 
voyons représentée sur l’organigramme. On n’a 
pas tenu compte ici du « filtre » initial. Nous ver- 
rons ultérieurement une représentation avec le 
filtre en question. 


eo Es 


M 


LÉ e—— 


Sans filtre initial 


Deux quantités étant introduites, on doit en 
inclure une troisième qui fait à la fois fonction 
de code et de marque de l’opération qui doit se 
réaliser avec les deux premières : 


1 : somme 
— 2 : soustraction 

3 : multiplication 
- 4: division 


Il convient de rappeler qu’il faut effectuer un 
contrôle pour que la seconde quantité, au cas où 
il s’agirait d’un code 4 (division), ne soit pas 
nulle, car cela nous donnerait une erreur. Dans 
cet exemple de test par élimination, le filtre qui 
détermine si le nombre est valide « se déplace » 
en passant par toutes les questions et après avoir 
vérifié que l’on ne peut opter pour aucune autre 
sortie. Une fois considéré comme valide, il n’est 
toutefois pas permis de trouver la démarche très 
recommandable, puisqu’elle implique une perte 
de temps et de travail, étant donné le question- 
nement à chaque contrôle. Dans le cas où il y 
aurait une quantité importante de décisions, on 
voit bien le problème posé : que de temps passé 
avant d’arriver à la conclusion que le code intro- 
duit est erroné! 
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Li 


Le traceur Penman 


L'utilisation de dispositifs robotiques peu coûteux, comme 
les tortues, est devenue de plus en plus populaire. Découvrons dans 
ce domaine le traceur Penman, qui nous vient de Grande-Bretagne. 


Le traceur Penman est composé d’une unité de 
commande, d’un traceur mobile, d’un bloc d’ali- 
mentation, d’un câble de connexion RS232 et du 
logiciel associé. Lorsqu'ils ne sont pas utilisés, 
l’unité de commande et le traceur ne forment 
qu’uneseule unité, quimesure 55 X 128 X 335 mm. 
Pour retirer le traceur de son boîtier dans l’unité 
de commande, vous n’avez qu’à appuyer sur le 
bouton situé sous l’unité, glisser le traceur à 
l'extérieur et dérouler son câble-ruban. Dès que 
le traceur se trouve hors de l’unité de commande, 
on aperçoit trois trous où peuvent être introduits 
des stylos, ainsi qu’un orifice central permettant 
de se servir d’un autre stylo pour effectuer des 
graphiques de type tortue. Les stylos feutres de 
40 mm de longueur sont maintenus au-dessus du 
papier au moyen de pinces à ressort. Lorsqu'ils 
reçoivent des commandes de traçage, le ressort 
est attiré vers le bas par des électroaimants fixés 
à des leviers internes, et le poids du stylo provo- 
que un contact sur le papier. 

Trois roues sont présentes sous l’unité; deux 
de celles-ci sont des roues d’entraînement. La 
troisième est une petite roue de plastique placée 
sur un galet pivotant et a pour fonction d’assu- 
rer l’équilibre de l’ensemble. Les roues d’entraî- 
nement, métalliques, sont recouvertes d’un maté- 
riel qui accroît leur friction sur le papier. Devant 
chaque roue, un capteur optique détecte le bord 
du papier en enregistrant la différence de bril- 
lance entre le papier et le fond sur lequel il est 
placé. 


Moteurs standards 


Trois électroaimants sont connectés à des 
leviers à l’intérieur du traceur ; chacun de ceux- 
ci commande les mouvements du stylo — la paire 
de moteurs électriques standards fixés aux roues 
d’entraînement est adjacente. Ce traceur utilise 
des moteurs électriques standards et non des 
moteurs pas à pas ou des servomoteurs ; ceux-ci 
permettent à l’unité de tracer des courbes régu- 
lières et non des courbes « saccadées ». 

Cependant, ils exigent la présence d’un logi- 
ciel assez évolué, puisqu'il doit être en mesure de 
faire varier les tensions appliquées aux moteurs, 
et non simplement d’envoyer une série d’impul- 
sions. 

Finalement, une carte de circuits distribue l’ali- 
mentation et décode les signaux provenant de 
l’unité de commande, puis les envoie aux électro- 
aimants ou aux moteurs. Sur chaque axe des 
moteurs, un disque stroboscopique accompagne 


CI. Chris Steven 


Matériel pu 


PENMAN 


la rotation du moteur ; de chaque côté du disque, 
il y a deux diodes photodétectrices. Lors de la 
rotation du disque stroboscopique, des impul- 
sions de lumière, détectées par les diodes, indi- 
quent aux circuits logiques la vitesse du moteur 
afin que la machine puisse connaître sa position 
à tout moment. Cette logique est particulièrement 
utile lorsque le traceur Penman sert de « souris », 
puisque l’ordinateur doit savoir dans quelle direc- 
tion et avec quelle rapidité les roues tournent, afin 
de déplacer le curseur sur l’écran. 

La carte de circuits imprimés de l’unité de com- 
mande renferme trois puces principales. Il s’agit 


ROMANE 


Le traceur et son unité 
de commande 

Le traceur Penman est 
composé d’un module de 
commande, connecté à 
un ordinateur via une 
interface RS232, et d'une 
tortue mobile. Le câble- 
ruban qui relie la tortue à 
la boîte de commande 
est bidirectionnel, ce qui 
signifie que les deux 
unités peuvent 
communiquer entre elles. 
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- Le connecteur D 
26 voies transmet les 

signaux d’entrée/sortie à 

_ l'ordinateur. 


La puce 6821 


entrées/sorties de 
nombreux appareils 


numériques. 


= . 


A 
N 
NX 


À 


Câble- 
ruban 
Le câble revient sous la 
plaque métallique de la 
boîte de contrôle en cas 


interface-périphérique 


gère les 


> 


s 


LE 


Les stylos "2" 

Le traceur peut utiliser 
jusqu’à trois stylos à la 
fois. 


d'arrêt de fonctionnement. 
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d’un microprocesseur 6303 (provenant du 6800), 
qui peut configurer une variété de systèmes 
d’exploitation. Le processeut se compose d’une 
RAM de zone de travail qui lui permet de stoc- 
ker la position du traceur. 

La seconde puce importante de cette carte est 
une EPROM qui contient les programmes de 
démonstration que peut effectuer le traceur 
Penman sans que le câble soit connecté. 

Le traceur Penman peut être utilisé dans dif- 
férents modes. Le mode « émulateur terminal » 
permet à l’unité d’être commandée du clavier. 
Pour passer à ce mode, vous devez soit charger 
directement le programme Pentik, soit, en utili- 
sant le traceur Penman comme une souris, char- 
ger le programme à partir du menu principal. Dès 
que le logiciel est chargé, les commandes sont 
envoyées à l’unité de commande via le port 
RS232 sous la forme de codes ASCII. Taper 
PRINT «l» initialise le traceur Penman. Il reçoit 
alors le signal et détermine lequel des trois rythmes 
de transmission (300, 1 200 ou 9 600 bauds) est 
utilisé. Cela étant fait, le traceur Penman est mis 
en position initiale en tapant la commande H. Le 


sNRe, cast 


FE 


_ Processeur 6303 
Le traceur Penman 
ete possède un processeur 


Dors 6303 qui lui permet de 
Macs configurer son propre 
ce système d'exploitation. 
Alimentation 


L'alimentation externe 
du traceur Penman est 


connectée à cet endroit. ROM du système 


___ d'exploitation 

rar Le système 

LR d'exploitation du traceur 
LS Penman est contenu 
dans cette EPROM de 

8 K. 


Solénoïdes 

Ces dispositifs 
électriques commandent 
les leviers qui 
maintiennent les stylos 
au-dessus du papier. 


Servomoteurs 
Le traceur est actionné par une paire 
de servomoteurs, un pour chaque roue 
d'entraînement. 


robot effectue alors une série de mouvements qui 
placent l’unité au coin supérieur gauche de la 
feuille de papier. 

De cette position de départ, le traceur Penman 
essaie de trouver le bas de la page à l’aide de ses 
capteurs photosensibles. Dès qu’il trouve un 
bord, l’unité effectue une rotation à 90° et effec- 
tue la même intervention du côté gauche de la 
page. Afin de s’assurer que le contraste entre le 
papier et l’arrière-plan est suffisant, le construc- 
teur a placé un morceau de papier noir sur lequel 
est posé le papier à dessin. Une fois revenu à sa 
position initiale, le traceur définit sa position 
d’origine à 50 mm de chaque bord du papier. 

L’application Pentlk peut être exécutée dans 
l’un des deux modes directs (une commande à la 
fois), ou les commandes peuvent être fusionnées 
pour composer des programmes destinés à être 
chargés, sauvegardés et exécutés. Le mouvement 
en mode « terminal émulateur » est cartésien 
— ce qui signifie que le papier sur lequel est placé 
le robot est divisé en grille. Lorsque le traceur 
reçoit l’instruction d’aller à (500,500), il se 
déplace vers ces coordonnées au lieu de se dépla- 


cer de 500 unités dans les deux directions. Une 
feuille de papier A4 a un maximum de 2 100 coor- 
données sur l’axe des x et 2 970 sur l’axe des y. 
Lescommandes peuvent être absolues ou relatives, 
selon le préfixe utilisé dans l’instruction MOVE, 
soit À, soit À. Les stylos sont sollicités par des 
commandes de type LOGO : U pour soulever le 
stylo, D pour le baisser et P pour le sélectionner. 

Le traceur Penman peut aussi produire des gra- 
phiques tortue en mode direct, bien que les mou- 
vements impliqués soient plus complexes que les 
mouvements cartésiens puisque la distance de 
déplacement doit être entrée en notation hexa- 
décimale et avoir le préfixe $. 

Cela s’explique par le fait que les graphiques 
tortue ignorent le logiciel normal qui interprète 
les mouvements cartésiens et interrogent direc- 
tement les bits des adresses de commande de 
l'ordinateur. Cependant, c’est là la seule manière 
d’effectuer des graphiques tortue avec le traceur 
Penman. Les applications logicielles intégrées 
permettent au robot d’être commandé à partir de 
LOGO. 


Commande en mode robotique 


Un système similaire à celui qui contrôle le tra- 
ceur Penman directement à partir du registre de 
direction de données du port utilisateur est uti- 
lisé pour commander le traceur en mode roboti- 
que. Chaque bit du registre commande un aspect 
différent des mouvements du robot — les bits 0 
et 1 et les bits 2 et 3 commandent respectivement 
les moteurs de droite et de gauche. Les bits 4 et 
5 exécutent les fonctions moteur générales comme 
la commutation des moteurs, tandis que le bit 6 
commande le mouvement vertical du stylo. Le 
traceur Penman fournit également de l’informa- 
tion concernant son activité au registre de don- 
nées, comme les erreurs de positionnement et la 
détection ou la non-détection du bord du papier 
par ses capteurs lumineux. Des commandes texte 
peuvent également être envoyées au traceur Pen- 
man. La gamme des commandes et de leurs appli- 


Positionnement 


Pour permettre au système de 
commande de connaître la position 
du traceur, il était nécessaire de 
prévoir un mécanisme quelconque 
de réaction à l'intérieur du robot qu 
compterait le nombre de « pas » 
effectués. Pour cela, les fabricants 
ont fixé un disque métallique près 
de l'axe de la roue d'entraînement. 
Le disque est doté d’un certain 
nombre de fentes très fines 

sur sa bordure extérieure. 

Sur la carte des circuits, un 
dispositif émet et reçoit de la 
lumière. En tournant, le disque 
produit un effet stroboscopique 
entre l'émetteur et le récepteur 
lumineux, qui est traduit en une 
série d'impulsions. Le nombre 
d'impulsions détermine le nombre 
de pas effectués 


cations est très similaire à celle des impriman- 
tes/traceurs présents sur de nombreux ordina- 
teurs domestiques. En fait, les formes des carac- 
tères tracés sont remarquablement semblables. La 
hauteur du texte varie de 1 à 127 mm, et le texte 
peut être imprimé dans quatre directions 
différentes. 

Le traceur Penman peut aussi tracer un texte 
incliné, ce que ne peuvent faire les impriman- 
tes/traceurs conventionnels. D’où un avantage 
appréciable. 

Le manuel qui accompagne le traceur donne 
une liste complète des commandes disponibles, 
en expliquant brièvement comment elles sont pri- 
ses en charge; de plus, le manuel présente les 
caractéristiques matérielles de l’unité. Il est peut- 
être un peu évolué pour le débutant; il semble 
qu’il ait été destiné aux amateurs qui en savent 
déjà assez long sur le fonctionnement de leur 
ordinateur. 

Le traceur Penman représente un pas de plus 
vers la conception d’une tortue-traceur à usage 
général. Lorsqu'elle est adéquatement utilisée, 
l’unité offre une résolution qui commence à 
approcher celle des traceurs professionnels. 
Cependant, le logiciel existant ne permet pas 
encore à cette machine de servir d’outil profes- 
sionnel. La série de programmes actuellement 
offerte vise principalement un usage éducatif. 
Les utilisateurs doivent écrire leurs propres pro- 
grammes pour utiliser le traceur, ce qui leur per- 
met d’apprendre les principes de base des logi- 
ciels robotiques. 

Un utilisateur professionnel n’attache aucune 
importance au potentiel de programmation de 
l’unité, mais désire simplement se procurer une 
unité facile à utiliser. 

En tant que périphérique éducatif, le traceur 
Penman apparaît comme un bon achat. Même 
s’il n’est pas le moins cher sur le marché, la 
variété des modes de fonctionnement offerts a de 
fortes chances de séduire de nombreuses écoles, 
où il pourrait servir à illustrer diverses 
applications. 


RÉCEPTEUR DE LUMIÈRE 


MOTEUR 


ÉMETTEUR DE LUMIÈRE 


…. 


335 x 128 x 55 mm. 


INTERFACE 


RS232, ce qui lui permet 
d'être connecté à tout 
ordinateur compatible 


RS232. 


RÉSOLUTION 


Dimension texte : 
1 à 127 mm; résolution 
graphique : 0,1 mm. 


permettent aux 
utilisateurs d'exploiter 
le potentiel du traceur 
Penman; mais il n'y a 
pas assez d'explications 
destinées au réels ê 
débutants. 


SOLENOIDE 


DISQUE STROBOSCOPIQUE 
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+ 


La mer est 
immense 


des petits événen ave 
module o 2ofs-échorofetl 
poisso a, re cue 

fraîche; tandis que le te 


ee le 


pe 7 


À 


Nous allons metfré au ‘point un ensemble de petits 


progrämmes dont l’un sera choisi de façon alé4- 


toiré par le sous-programme Jigne 5500. Nous 
avions déjà incorporé cinq événements différents. 
Si nous'incorporons les nouveaux, nous-arrivons 
à un total de 13, et’c’est pourquoi la valeur de / 


ttRM, lignè46, doit être fixée à 13. Il faut aussi 
modifier la ligme 5525, pour ce qui est de l’ins- en $ du 


ction ON X 6010; parce qu’elle renverra désor- 
ais à davantage de numéros de ligne. Le 
Mir 1me principal f t choi chaque semaine, 


F4 


acré à a prise du DE. 
aleur de 6 (le nombre étant tiré 
s le programme principal se diri- 


| 


ie on a 


re de semaines pendanties- 


“quelles on e Ÿ recourir. 
S 


| L’évé ivantde. ON.XGOTO - 
pr Re nem antde est une tem 
cherons c Pin sor- 
= va s eau 74 ini barrique afin de recueillir un peu d’eau 
e pluie, c 


ui VOUS p permettra de renouveler vos 
isions d’eau. L#’encore, ligne 5735, le pro- 
. gramme génère un nombre aléatoire compris 
ntre 11 et 20, qui représente le nombre de ton 
neaux ainsi récupérés; il est ajouté ligne 5750; 


à ce qui restait encore, La ligne 5755 ce et} 


affiche ensuite une estimation permettant de 
savoir combien de pe le Per stock ol 
être utilisé. 

Les pre coi mime te hi ième! 
événement: Îls augmentent l’allure du vaisseau, 
et permettent de raccourci d’une demi-s maine 


Î 


5835. L'événement numéro neuf correspond 
a‘ beau temps. Le sous-programme correspon- 
dant commence ligne 5850 (en neuvième position 


u hasarde, ji e 5525) Les membre$de l'équipage ont ai 


Poccasion de se reposer un peu;,tce qui est très 
profitable à leur santé : leurs forcés, contenues 
en ont donc a mentée a one 588 
crée une boucle qui parcourt ce tableau. Erreffet, 
si la force d’un mort étai ugmentée, il revien= 
drait à la vie! La ligne 5884 s’assure donc dé 
Pexistence éventuelle-de valeurs égales à. (ot 
729 (correspondant : à"des décès), £t.ignore lès 
marins qui sont dans ce cas. Un nombre aléatoire 


ble CN) avant la fin dela semaine; 
extraordinaire tous les aut 


évidemment personne pour pêcher 1 
Le programme tient donc compte 
éventualité en établissant une boucle, ligne 5610: 
Il consulte le tableau de l’équipage pour voir si 
d’aventure untel ou untel n’est pas mort pendant 
semaine, vérifiant si sa force n’est pas désor- 
mais ixée à -999. : 

La lig 630 fait le décompte des morts, qui 
sont soustraits deJ’effectif total. Si le résultat est 
inférieur à 1, il ne sep 
nera en programme principe 

Si, en revanche, certains marins*sont encore 
debout, la ligne 5650 génère un nombre aléatoire 
compris entre 11 et 20, qui représente, en kilo- 
grammes, la quantité de poisson prise, le tout est 
ajouté ligne 5680 à la viande qui reste; le pro- 
gramme vous informe ensuite du temps pendant 
lequel le nouveau stock durera. Enfin, ligne 5685, 
ce nouveau total est divisé par lenombre d'hommes 
d’équipage, compte tenu de leurs besoins hebdo- 
madaires, afin de fournir une nouvelle estima- 


ssera rien, et l’ onjretour- RPRP'E 
valeur d 


aux R de tous les survivants. re 
s médicaments PR am pas 


marque” le début! d’un sous- | 
consacré au dixième  événen it : la | 
édicaments. Le ma 6 


sont perdus, et ce 
es si la plupart des marins tom ent mala- 


‘des. Le progre mme vérifie d’abord qu’il y a bel 


et bien’ des Méditäments à bord, en examinant 
le tableau OAl}, consacré aux marchandises, et 


isémenfison premier t;$'il 
lou ae “nue eh 1 “ ä En NS 
le cas contraire, la pr existante est divisée 
par deux, re 5925. Il est vrai, cependant, que 
és'bouteilles ne se brisent pas véritablement par 
moitié, et c’est"pou O e la partie entière 
du résultat sera retenue. Un méssag 
affiché, de façon que le joueur sache combien de 
bouteilles il lui reste. 

Le onzième événement est lié à la tempête : les 
vagues déchaînées provoquent la rouille des 
fusils, qui ne sont donc plus en état de fonction- 


Le: 


eomprisentre 5 et 15 est ensuite ajouté, ligne 5886, 


… la destruction des flacons,-qui se sont brisés; les + 
 rddes cg équences 


ner. Or, ils ont beaucoup d’importance (défense, 

commerce, poursuite de la nourriture). Le sous- 

programme est celui qui est consacré aux bou- 

teilles brisées : ya-t-il des fusils à bord (ligne 5955)? 

iser la ee par deux (ligne 5975), 
ésultat. 


$ évoré a moitié d des b 


Si- oui, Jes:s ouris, “dissim 
ent la moitié lu u tout, etlé j joue! 
ite ir ormé de cefquirester 1x5: 


lus difficile, en modifiant les‘ fac-" 
ttent l'apparition de tel À du ur 


autres, ne serait- i 
duire deux fois par semaine — mais def 
_ férente. Si l'événement ET EEtiohé pa) 
truction ON X GOTO, ce ne sera qu’un déta 
grañde portée. 
-. _Si-Poiseau est.aperçu alors que l'équipage € 
réduit à des demi- rations de viande, les homries 
pourroi 


la ligné 860; les autres, id importants, par la 
ligne 870. A la ligne 875 vient s’insérer la seconde 
apparition de l’animal. Il faut d’abord voir si 
l’équipage a été mis à une ration réduite de viande 
(dans ce cas HR(3) sera égal à 05). Si oui, un fac- 
teur aléatoire — AND RND(1)<.5 — donne une pro- 
babilité de 50 % que l’albatros soit repéré. Si 
— nouvelle condition — tel est bien le cas, on 
passe au sous-programme proprement dit, qui 
commence ligne 6050. 

L'apparition d’un albatros est un présage favo: 
rable. La ligne 6055 définit la variable A$ comme 
égale à 0, ce qui indique que l’oiseau’ a été vu. 
Cela aura un usage plus tard : la chance est avec 
vous, ce qui réduit les possibilités de mutinerie. 
Ligne 6075, le programme s’assure si oui ou non 
l équipage manque de viande. Pour cela, il cher- 
che à savoir si la quantité restante est égale ou 
plus grande que les exigences hebdomadaires des 
matelots, multipliées par le temps qui reste à par- 


courir avant que le voyage n’ait pris fin. Si les 


réserves sont suffisantes, l’albatros disparaît 
au loin et la ligne 6130 renvoie au programme 
principal. 

Si, en revanche, il ne reste guère de viande, le 
joueur se voit informé d’un détail intéressant : 


_umfloiseau pèse 10 kg; veut-il tirer sur lui? La 


ligne 6115 détermine la première lettre de la 
réponse. Il est bien sûr possible de ne pas tirer. 
Si toutefois vous avez absolument besoin de la 
chair de l’animal, la ligne 6133 vérifie d’abord 
que 0A(? n’est pas égal à zéro, ce qui indiquerait 


sta ide, il ya moyen de.rendre le jeû plus S ‘+ 


® CLE DETUUC au ou UC DTO 
gramme vous en informera, et P Libatro! pourra 
pie sain ét sauf. 


La « poisse » 


S’il y a des fusils, un coup de feu est tiré. Les 
chances d’atteindre la bête sont fixées, ligne 6140, 
à 50 %, puisque cette ligne génère un nombre 


aléatoire compris entre 0 et 1. S’il'est supérieur! 


à 5, c’est un échec; dans le/cas contraire, 
l’oiseau est touché et tombe sur le pont. 


Au cas où les réserves deviande’se seraient \ 


épuisées durant la semaine, la valeur, -Corres- 
‘pondante du tableau passerai de -9 à zéro 
(ligne 6160), de façon qu’on püisse ténir compte 
des provisions supplémentaires que représente la 


_<arcasse de Panimal. La quantité de viande, PAG} 


” (dans le tableau des provisions), est augmentée 
de 10 Kg, et le joueur se voit préciser quel est le 
stock actuel. 

IHn’est db augure de tuer un 
albatros, comme le savent les lecteurs du poète 
anglais Coleridge. Notre programme entreprend 
entout cas de donner à B$, ligne 6162, la valeur 0. 
C’est le facteur de « poisse » qui vient s’opposer 
au facteur de chance de la ligne 6055. Nous vous 
préciserons plus loin ce qu’il faut entendre par 
là précisément. 

Le joueur ne connaîtra pas exactement les rai- 
sons de ce qui se produit, mais certains facteurs 
seront modifiés de façon que la marche du navire 
se trouve ralentie. 
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Module 7 : 
encore de l'imprévu 


Addition à la boucle principale 


875 1F HRC3)=. SANDRND(1) . STHENPRINTCHRS 


S.IP. Encore de l'imprévu 


REM EVENT 6 - ATTRAPER DES POISSONS 

x=0 

FORT=1T016 

IFTSCT; 2)=-999THENX=X+1 

REM COMPTE DES MORTS DE LA SEMAINE 

NEXT 

IFCN-X <1 THENRE TURN 

REM PAS D'ACTION SI TOUS MORTS 

PRINT 

S$=" PENDANT LA SEMAINE*":GOSUB3100 
PRINT : GOSUB3200 

S#="L'EQUIPAGE À PRIS+":GOSUB9100 

X= INT CRNDC 1) #10) +11 

REM DE 18 À 29 KG 

PRINTX: “KILOS DE POISSON" 

PRINT :GOSUB9208 

SS="VOTRE RESERVE DE VIANDE PEUT+":G0SUB9120 
SS="DESORMAIS SUFFIRE POUR ENVIRON+"* : GOSUBS100 
IFPACS) =-S9STHENPACS) =@ 

PACS) =PACID#X 
PRINTINTCPA(S) / CCN#PN CS) )) SEMAINES" 

GOTOSSSS 

REM EV.7 EAU DE PLUIE 

PRINT 

St=" PENDANT LA SEMAINE*":GOSUB9108 
PRINT : GOSUB9208 

S#="LES PLUIES ONT PERMIS+" : GOSUB9 100 

S6="DE REMPLIR D'EAU VOS TONNEAUX+" :GOSUB9100 
PRINT :G0SUB9200 

X=INT CRNDC12#1@) +11 

REM 19 TO 20 BARRELS 

S#="VOTRE RESERVE D'EAU PEUT*":GOSUBS100 
Ss="DESORMAIS SUFFIRE POUR ENVIRON+*:GOSUBS 120 
IFPAC&)=-9S9STHENPA (4) =8 

PAC) =PACA) #+X 
PRINTINT(PA(&) / CCNSPN C4) )) 3 5 "SEMAINES" 
GOTOSSI0 

REM EV & - VENTS FAVORABLES 

PRINT 

S$="VENTS FAVORABLES TOUTE LA SEMAINE ! +" :GOSUBS91 


FÉÉFFERLIITEIIIT TE 


35 


5720 
5725 
5730 
S735 
S736 
5740 
5745 
5748 
5750 
5755 
s76a 
ss2e 
5805 


PRINT : G0SUB9200 

S$="VOUS AVEZ BIEN AVANCE*" : GOSUB9100 

S#="ET LA DUREE DU VOYAGE EST+":GO0SUB93100 
S$="REDUITE D'UNE DEMI-SEMAINE*" : GOSUB9100 
EW=EW-. S 

GOTOSS@ 

REM EV - 9 BEAU TEMPS 

PRINT 

S$="BEAU TEMPS TOUTE LA SEMAINE !*":GOSUB93100 
PRINT : GOSUB9209 

S$="L'EQUIPAGE EST DE BONNE HUMEUR+" : GOSUB9100 
GOSUB3200 

Sé=" ET EN MEILLEURE SANTE ! #" :GOSUB9 100 
FORT=1T016 

IFTSCT, 2)=0 OR TSCT, 2) =-SSSTHENSESS 

TSCTr 2)=TS CT, 2) + INT CRND(1)#112+5 

NEXT 

GOTOSS39 

REM EV 10 - PERTE FLACONS 

IF DAC1)=0 OR DA(1) =-SISTHENRETURN 

PRINT 

S#="VOUS VOUS APERCEVEZ QUE LA MOITIE*":GOSUBS1 


AHETELLEFFREEENTESE 


S#="DES FLACONS SE SONT BRISES+":GO0SUB93100 
OAC12=INT OA(1)/2) 

PRINT : G0SUB3200 

S$="IL NE RESTE PLUS QUE+":GOSUB9100 
PRINTDA(1)5"DES BOUTEILLES VIDES" 

GOTOSS3@ 

REM EV 11 - LA ROUILLE ! 

IF DA(2)=@ OR 0A(2) =-S9STHENRETURN 

PRINT 

S#"VOUS VOUS APERCEVEZ QUE LA MOITIE*" :GOSUB9120 
S$="DE VOS FUSILS ONT ROUILLE+":GO0SUBS100 
Ss="ET NE PEUVENT PLUS SERVIR+":GOSUB9 100 
OAC2)= INT (OR(2) /29 

PRINT : GOSUBS200 

Ss"IL NE VOUS RESTE PLUS QUE+":G0SUB9100 
PRINTOA(2) ;"FUSILS INUTILES" 


ITFTHSTI TE 


pi 
œ 


LE 


5335 GOTOSSS0 
REM EV 12 - TISSU PERDU 
IF OA(4)=@ OR OA(4)=-SSSTHENRE TURN 
PRINT 
S$="VOUS VOUS APERCEVEZ QUE LA MOITIE+*":GOSUBS100 
S$="DE VOS BALLOTS DE TISSU+":GOSUB3100 
S$="SONT RONGES PAR LES SOURIS+":GO0SUBS3100 
S$="ET N'ONT PLUS DE VALEUR+":G0SUE9108 
OA(4)=INT(OA(&) /2) 
PRINT :GOSUB3200 
S$="IL NE VOUS RESTE PLUS QUE*+":G0SUB9122 
PRINT@A(&) : "BALLOTS VIDES" 
G0TOSS30 
REM EV 13 - ALBATROS 
PRINT :AS=" y" 
S$="UN ALBATROS SURVOLE LE BATEAU+" :GOSURS 


G0SUBS3200 

S$="C'EST UN HEUREUX PRESAGE*" :GOSUB3100 
S$="ET L'EQUIPAGE SE REJOUIT+" :G0SUBS190 
PRINT : GOSUB3200 

IFPACS) CCCN#PN CT) #CIL-WK+1 ) ) THENGO9O 

REM PAS DE DISETTE DE VIANDE 

GoTo6122 

S$="VOUS ETES A COURT DE VIANDE*":G0SUB3188 
Ss="ET CET OISEAU PESE 10 MG !+":G0SUB9100 
PRINT : GOSUB9200 

S$="AIMERIEZ-VOUS LE CAPTURER ?*":60SUB3100 
INPUTIS$ 

PRINT :GOSUBS200 

IFLET#CIS$, 12="0" THENGS133 

S#="C'EST AUSSI BIEN!*+":GOSUB9108 

PRINT :G0SUB93200 

Ss$="L" ALBATROS DISPARAIT...#*":GOSUB9120 
GOTOSSS@ 

IFDA(2) =@ORDA (2) =-S9STHENG180 

S$="ON TIRE SUR L’ OISEAU, 
G0SUB3200 : G0SUB3208 

IFRND (12 €, STHENG158 

S#="...MAIS EN VAIN'#*+":G0SUB3100 

GOTO6122 

S$="ET IL TOMBE SUR LE PONT !+":GOSUB91 


PRINT : GOSUB9200 

IFPACS)=-S9STHENPA(S)=0 

PACS) =PACI)+18:88="0" 

Ss="VOUS AVEZ MAINTENANT#" : GOSUB3100 

S#="10 Ke DE VIANDE EN PLUS... #+":GO0SUB9100 
S#="MAIS PEUT-ETRE LA CHANCE+*" :GO0SUB9100 
S$="VA-T-ELLE TOURNER...#":GOSUB9102 

GOTOS530 

S$="ET COMMENT FAIRE SANS FUSILS?*+":GDSUB93100 
GOTO6122 


Variantes de basic 


Spectrum : 
Procédez aux modifications suivantes : 


875 IF HR(31=.5ANDRND(1}<b.THENCLS 
:60 SUB 600 

5527 IF X=6 THEN GO TO 5600 

5528 IF X=7 THEN GO TO 5700 

5529 IF X=8 THEN GO TO 5800 . 

5530 IF X=9 THEN GO TO 5850 

6531 1F X=10 THEN GO TO 5900 

5532 IF X=11 THEN GO TO 5950 

5533 IF X=12 THEN GO TO 6000 

5534 IF X=13 THEN GO TO 6050 

5535 PRINT:S$=K$:GO SUB 9100 

5536 LET 1$+INKEYS:IF INKEYS= "‘ THEN GO TO 5536 

6115 IF 1$ (1 TO 11="Y" THEN GO TO 613 


BBC Micro : 
Procédez aux modifications suivantes : 


875 IF HR(3)=.5AND RND(IK5 
THEN CLS: GOSUB600 


Connaître votre ordinateur 


ea 


DS AGP CPS API ORDRE RAS PRE ROSE EPA ST AH LÉTON PE SERRES ECS 2806 


Voici une première sélection de quelques livres ‘concernant les 
ordinateurs les plus répandus sur le marché français pour vous 
sich de mieux sd toutes leurs RP ennes- 


ARMOR LS AVR ORPI AIS 


Vous avez acquis un ordinateur avant d'aborder 
cette encyclopédie, ou bien vous avez fait cet 
achat au cours de sa lecture. Peut-être avez-vous 
déploré que l’on parle peu des particularités de 
votre machine, et vous êtes-vous senti un peu 
seul à parler votre « dialecte » BASIC. 

Mais rassurez-vous. Pour tous les micro- 
ordinateurs présents sur le marché, il existe une 
bibliographie plus ou moins abondante. Aussi 
avons-nous sélectionné pour vous quelques 


Aller plus loin en Basic 107 


Les onze programmes originaux présentés ici 
mettenten valeur l’utilisation pratique de l'ensem- 
ble des instructions du Basic TO7. L'auteur 
explique dans le détait#a démarche qu'il a sui- 
vie en insistant sur les diverses étapes : concep- 
tion d'ensemble, rédaction des blocs fonction- 
nels, vérification et mise au point des blocs, etc. 


Par J.C. Wanner. 
312 pages. Format 17 x 22 cm. 
Eyrolles. Collection Microplus. 


La conduite du MO5 


Ce livre vous permettra d'exploiter toutes les 
capacités de votre micro. Vous apprendrez à 
faire tenir 16 K de mémoire vive avec seulement 
8 K d'adresses, à changer de couleur sans utili- 
ser les commandes BASIC. Vous trouverez un 
programme vous permettant de définir automa- 
tiquement des formes, puis de les sauvegarder 
sur cassette. Une large place est accordée à 
l'explication des commandes graphiques. 


Par J.Y. Astier et A. Kauf. 
152 pages. Format 14,5 x 21,5 cm. 
Eyrolles. Collection Micro-ordinateurs. 


REASON DPI OD EAN EDEN ARR ICT PRGPPINRDPEPEDS 


titres d'ouvrages consacrés aux matériels les 
plus répandus en France. Ils vous aideront à maï- 
triser parfaitement votre ordinateur et, dès lors, 
vous serez à même d'adapter la plupart des pro- 
grammes présentés dans « ABC Informatique » 
à votre machine. Cette première sélection est 
plus particulièrement tournée vers les matériels 
Thomson. Nous verrons ultérieurement des livres 
consacrés, entre autres, aux ordinateurs Alice de 
chez Matra et à ceux de Philips. 


La conduite du T07-70 


Obtenez le maximum de votre ordinateur TO7-70 
grâce à ce livre, qui vous apprend comment en 
utiliser toute la mémoire et en maîtriser les pos- 
sibilités graphiques. Vous apprendrez à utiliser 
le crayon optique, à déjouer les pièges de la pro- 
grammation en langage machine, etc. Un détail 
d’une instruction vous fait défaut ? Vous y retrou- 
verez l'instruction voulue, expliquée et accom- 
pagnée d’un exemple clair. Préférez-vous vous 
adonner à la programmation en assembleur? Ce 
livre vous dévoile tout sur les points d’entrée du 
moniteur et ses variables système... 


Par G. Guillon. 
204 pages. Format 14,5 x 21,5 cm. 
Eyrolles. Collection Micro-ordinateurs. 


Pratique du MOS 


Deux volumes contenant respectivement vingt- 
quatre programmes (Niveau 1) et vingt-huit pro- 
grammes (Niveau 2). Le premier apprend l’art et 
la manière d'utiliser le MO5. Vous saurez 
comment fonctionne ce micro-ordinateur, vous 
apprendrez à le programmer en BASIC, à exploi- 
ter les logiciels du commerce en cartouche ou 
cassette, en un mot, tout ce qu'il faut savoir 
lorsqu'on veut acquérir un MOS5. 


Thomson-S.I.M.I.V 


1656 


Le second volume constitue le complément 
indispensable pour pousser plus à fond votre 
approche de l'informatique, et notamment de la 
programmation en BASIC. Vous apprendrez entre 
autres à « déboguer » un programme, à mani- 
puler les chaînes de caractères, les sous- 
programmes, les fichiers, les tableaux, les gra- 
phismes et leur animation. 


Par H. Lilen. 

Format 21 x 29,7 cm. 
Vol. 1 : 192 pages. 
Vol. 2 : 176 pages. 
Editions Radio. 


Pratique du T07-70 


Voici encore deux volumes, de vingt-quatre pro- 
grammes chacun. Le Niveau 1 s'adresse aux tout 
débutants, et leur explique tout ce qu'il faut 
savoir pour exploiter ce micro-ordinateur : en 
quoi consiste une telle machine, comment on la 
connecte et on la met en marche, comment on 
exploite des programmes tout faits (jeux, ensei- 
gnement, petite gestion familiale), en cartouche 
ou en cassette, et comment on la programme 
en BASIC. Vérifiez et exploitez vos nouvelles 
connaissances en exécutant les deux douzaines 
de programmes, exercices ou jeux proposés. 
Suite du précédent, le Niveau 2 développe les 
notions de Basic acquises, les généralise et 
vous explique les règles importantes, et en par- 
ticulier l’art de « déboguer » un programme. || 
vous enseigne également le traitement des 
tableaux, des chaînes, des sous-programmes, 
des fichiers. Vous apprendrez à créer des 
« modules » graphiques, à les animer, etc. Grâce 


Ë 


aux programmes, exercices ou jeux que vous 
découvrirez tout au long de ce livre, vous acquer- 
rez la maîtrise du BASIC. 


Par H. Lilen. 

Format 21 x 29,7 cm. 
Vol. 1 : 192 pages. 
Vol. 2 : 176 pages. 
Editions Radio. 


Apprivoiser 107, MO5, T07-70 


Cette initiation s'adresse surtout, par son 
contenu et sa présentation aérée et illustrée de 
dessins, aux jeunes à partir de 10 ans. Guidé et 
conseillé par le prince Silicone, cousin du per- 
sonnage imaginé par Saint-Exupéry, le lecteur 
apprendra à conserver en BASIC et découvrira la 
programmation au travers d'exemples aboutis- 
sant à un jeu complet : le jeu des drapeaux du 
monde. L'ouvrage est complété par une cassette 
contenant des jeux, des utilitaires et un logiciel 
éducatif. 


Par B. Dupuy et B. Violet. 
175 pages. Format 18 x 25 cm. 
Foucher éditeur. 


MOS - TO7 vos programmes 


Les vingt programmes proposés ici exploitent 
toutes les capacités des trois micro-ordinateurs 
de Thomson (MO5, TO7 et TO7-70) : graphisme, 


couleur, musique, crayon optique. Les sujets : 


abordés vont des jeux de réflexes aux spectacles 
musicaux ou graphiques, en passant par les jeux 
de réflexion, de hasard, de stratégie ou de 
mémoire, tous originaux, pour un ou plusieurs 


joueurs. Les listages sont commentés et struc- 7 


turés pour permettre au lecteur de les compren- 
dre et de les adapter. 


Par S. Pouts-Lajus et P. Champeaux. 
130 pages. Format 15 x 23 cm. 
Cedic Nathan. 


Passeport pour Basic T07 et 07-70 


Très facile d'usage et très pratique, ce livre 
s’adresse aussi bien au débutant qu’au program- 
meur averti. Tous les mots clés sont répertoriés 
dans l’ordre alphabétique, accompagnés d’un 
programme et d’une explication détaillée. 


Par C. Galaïs. 
160 pages. Format 11,5 x 16,5 cm. 
E.T.S.F. Collection Poche-informatique. 


MO5 premiers programmes 


Écrivez votre premier programme BASIC sur MO5 
en moins d’une heure! 

D'une présentation claire, comportant de nom- 
breux diagrammes et illustrations en couleurs, 
ce livre vous enseigne les bases de la program- 
mation en BAsIc sur MO5. Avec lui, vous appren- 


CRDI TL 1 LL LL 
1 
ÉCTTLLL LL 


drez à programmer en quelques heures, quels 
que soient votre âge et votre formation. 


Par R. Zaks. 
245 pages. Format 16 x 22 cm. 
Sybex. 
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’2 f - 
Procédures et fonctions 


On peut définir en PASCAL ses propres procédures et fonctions. 
Nous allons nous y attarder ainsi que sur les concepts très 
importants de « portée » et de « passage de paramètres ». 


Nous allons définir nos propres procédures et 
fonctions, pour compléter celles du PASCAL, telles 
que wie et sqt. Rappelons la différence entre une 
procédure comme write et une fonction comme 
sat. Lorsque l’on écrit par exemple : 


write l'Bonjour !") 


nous envoyons sur le fichier standard de sortie 
la chaîne de caractères indiquée comme paramè- 
tre unique. En d’autres termes, Wiite désigne un 
sous-programme qui sait comment envoyer au 
périphérique de sortie (la visu) des données sous 
la forme d’un flux de caractères. Mais que ferait 
l'instruction suivante ? 


sqrt (256) 


La réponse est, bien sûr, que cela générerait un 
message d’erreur à la compilation, l'instruction 
étant illégale. Par ailleurs : 


write (sart (256) 


ne serait pas seulement légal, mais afficherait éga- 
lement quelque chose comme 1.6000E +01; si vous 
pouvez en apprécier le pourquoi, vous savez dis- 
tinguer une procédure d’une fonction. 

L’identificateur write appelle un processus qui 
envoie les données à un flux de sortie; c’est une 
procédure que l’on peut appeler par son nom. 
Une autre procédure PASCAL est page (F} qui com- 
mence une nouvelle page sur le fichier texte F. 
En revanche, l’identificateur sqt doit toujours 
être accompagné d’un seul « argument » numé- 
rique, et il restitue uniquement un résultat — le 
nombre réel qui est la racine carrée de son argu- 
ment. Ainsi, la première distinction que l’on peut 
faire entre une procédure et une fonction, c’est 
qu’il n’existe pas une instruction de fonction. De 
même qu'écrire 16 tout court ne signifie rien 
(c’est seulement une valeur), et des expression 
telles que sat(X/3| ou oddiN) n’ont pas de signi- 
fication en elles-mêmes. Les identificateurs 
de fonctions se comportent davantage comme 
des variables jamais initialisées, mais évaluées 
chaque fois que leur nom est utilisé dans une ins- 
truction du programme. Le résultat sous la forme 
d’une valeur unique est obtenu à partir de l’exa- 
men de la ou des valeur(s) courante(s) de l’argu- 
ment ou des arguments de la fonction. 

Les procédures, à l’inverse, ne donnent pas de 
valeurs et ne peuvent donc pas être utilisées dans 
des expressions. L’instruction : 


N: = Writeln 


est manifestement illégale, tout comme LET N - 
PRINT le serait en BASIC. 


L’écriture de programmes importants en PAS- 
CAL est grandement facilitée par la possibilité 
que l’on a de donner un nom à ses propres pro- 
cédures et fonctions, d’en contrôler l’accès et leur 
utilisation conjointe. De même que pour l’attri- 
bution de noms aux variables, le manque relatif 
de restrictions sur les identificateurs signifie que 
l’on peut librement choisir des noms appropriés 
et commodes pour nos sous-programmes. Soit le 
programme suivant : 


PROGRAMME Incomplet (entrées, sorties, fichierdesdonnées) ; 
{déclarations} 
BEGIN 
Ouvrir (fichierdesdonnées): 
WAHILE NOT Eorf (fichierdesdonnées) DO 
BEGIN 
read (fichierdesdonnées, élément) ; 
Traitement (élément) 
END 
END 


Bien que nous n’ayons pas encore traité la ges- 
tion des fichiers, vous devez comprendre facile- 
ment comment procède le programme. Dans sa 
partie déclaration, nous définissons une procé- 
dure qui localise le fichier des données sur la sau- 
vegarde et l’ouvre en lecture (Ouvrir), puis une 
autre destinée à traiter de manière appropriée 
chaque élément de données (Traitement). Le pro- 
gramme utilise également deux identificateurs 
prédéfinis du PASCAL. La procédure read (que 
nous avons utilisée jusqu'ici pour lire une entrée 
de texte) peut être utilisée comme indiqué plus 
haut pour lire toute donnée, structurée ou non. 
La fonction booléenne EoF (End of File/fin de 
fichier) donne la valeur « vrai » lorsque la lec- 
ture a porté sur le dernier enregistrement du 
fichier donné en argument. À nouveau, en ne pré- 
cisant pas l’identificateur du fichier, on renvoie 
au fichier d’entrée standard par défaut. Pour les 
fichiers texte seulement, la fonction Eoln (End of 
Line) donne le résultat « vrai », lorsque le 
dernier caractère de la ligne a été lu. Voyons 
comment cela s’applique à la définition de nos 
propres sous-programmes. 

De manière fondamentale, il y a peu de diffé- 
rences entre des programmes, des procédures et 
des fonctions — il s’agit toujours de modules 
pouvant avoir leur propre description locale de 
données et corps d’instructions. La seule diffé- 
rence de syntaxe concerne l’en-tête. Pour un pro- 
gramme, l’en-tête est constitué du mot réservé 
PROGRAM, d’un identificateur à la discrétion de 
l'utilisateur nommant le programme, et d’une 


liste de paramètres identifiant les fichiers avec les- 
quels le programme communique. L’en-tête 
d’une procédure comprend le mot réservé PROCE- 
DURE suivi de la liste des paramètres formels, 
identificateurs du type de chaque paramètre de 
données. Ainsi, par exemple : 


PROCÉDURE Lignes (NombLignes : entier) ; 
VAR 
N : entier; 
FOR N ; = 1 TO NombLignes DO 
WriteLn 
END; 


A la fin d’une procédure, END est suivi d’un 
point-virgule et non d’un point comme à la fin 
d’un programme. Nomblignes, identificateur de 
paramètre formel, reçoit sa valeur par l’instruc- 
tion d’appel : 


Lignes (5) 


Cette procédure simpliste est néanmoins très utile 
lorsque nous voulons, pour des raisons de clarté 
de présentation, laisser plusieurs lignes blanches 
(cinq, ici). Elle nous épargne (ainsi qu’au com- 
pilateur) ces séquences fastidieuses d’instructions 
Wrteln séparées par des points-virgules. Cette 
procédure vous permet de laisser en blanc autant 
de lignes que vous le voulez, Lignes (10) laissera 
10 lignes, Lignes (2), 20, et ainsi de suite. 


Portée 


Cet exemple illustre également la sûreté du PAS- 
CAL. La variable de contrôle de boucle FOR doit 
toujours être déclarée comme vraie variable 
locale. Nous n’aurions pas pu dire par exemple : 


For NombLignes:= 1 TO NombLignes DO... 


Même si c’était acceptable dans un programme 
principal, la sûreté de la boucle ne serait pas 
garantie si son contrôleur n’était pas local ou 
« relativement global ». Avez-vous déjà eu à 
déboguer un programme BASIC comme celui-ci : 


300 FORN = 1TOT 
400 GOSUB 2000 
500 NEXT N 


pour finir par découvrir qu’un sous-programme 
lointain, qui peut être appelé indirectement et 
conditionnellement, utilise également N. Le PAS- 
CAL interdit formellement une telle conduite et 
vous permet de gagner du temps de développe- 
ment. Tout identificateur déclaré dans un pavé 
de programme a une région définie qui porte sur 
toute sa longueur. Cependant, sa « portée », 
c’est-à-dire la portion de programme depuis 
laquelle il est accessible, ne s’étend que depuis 
l’endroit de sa déclaration jusqu’à sa fin. Cette 
limitation peut être encore accrue par redéfini- 
tion. Dans l’exemple précédent, le N auquel il est 
fait référence dans la procédure Lignes est naturel- 
lement l’entier déclaré localement. Cette décla- 
ration a priorité sur toute autre relativement glo- 
bale lors de chaque activation de la procédure. 
Par rapport à l’étendue du programme principal 
(portée) dans l’exemple donné, les régions propres 


Portée 


Dans le programme Portée esquissé ici, les 
régions et les portées des diverses 

procédures et variables sont indiquées dans 
la table suivante : 


PROGRAM Portée 

VAR 
N ‘entier; 
X :réel; 

PROCÉDURE A (Y : réel}; 
TYPE 

X = SET OF char; 

{etc.] 

PROCÉDURE B (N:entier) ; 
{etc.) 

BEGIN {Programme principal - 
Portée) 


A (succ (N)/3) ; 
B (N); 
A {X) 

{etc.| 


END. 


aux variables globales N et X sont constituées par 
l’ensemble du programme. La portée de X 
s’étend depuis sa déclaration jusqu’à la fin du 
programme, à l'exclusion du champ de la procé- 
dure À. Cela, parce qu’un autre X (SET OF char) est 
défini en tant qu’identificateur de type; sa région 
étant le pavé À. De manière similaire, dans B, N 
se réfère au paramètre formel de B, et non pas 
à la variable globale. 

Bien que les aires de À et B soient la totalité du 
programme, la portée de B ne commence qu’à 
son point de définition. C’est-à-dire que lorsque 
vous utilisez À à l’intérieur de B, B est invisible à 
A. Cela renforce la logique implacable du PAS- 
CAL : aucun programme ne peut être exécuté 
avant d’avoir été écrit ! Cela explique également 
pourquoi les définitions et déclarations doivent 
figurer dans l’ordre suivant : CONST, TYPE, VAR, 
suivis des définitions de procédures et de fonc- 
tions ordonnées selon les besoins structurels du 
programme. De nombreux compilateurs PASCAL 
sont à un passage, c’est-à-dire qu’ils lisent le code 
source une seule fois. Cela serait rendu impossi- 
ble sans cet ordre logique. 

L’effort de devoir déclarer les données locales 
à chaque procédure est largement récompensé. 
La modularité est assurée en transmettant aux 
procédures toutes les valeurs pour les données 
sous la forme de paramètres. En effet, même s’il 
se peut que vous trouviez des programmes PAS- 
CAL qui utilisent des procédures sans listes de 
paramètres, c’est-à-dire en accédant de manière 


. globale à toutes les données, cette pratique doit 


être absolument évitée. On peut du reste consi- 
dérer qu’il s’agit là d’une des faiblesses (rares) 
du PASCAL, de permettre ce genre d’abus. Vous 
remarquerez que l’utilisation de N dans B renvoie 
à son paramètre formel local, l’entier N global 
étant temporairement inaccessible. Outre la 
sûreté inhérente à ce type d’organisation, cela 
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permet à toute une équipe de programmeurs de 
travailler sur un grand projet sans avoir à se 
préoccuper des éventuels conflits d’identifica- 
teurs. L’appel de B transmet la valeur de l’iden- 
tificateur global N en tant que paramètre réel. 
Ce dernier, également appelé B, est en fait une 
variable totalement distincte. Cela implique les 
points suivants : 

° Une copie locale de la valeur transmise à un 
pavé est faite lors de l’accès à ce dernier. 

e Aucune modification effectuée sur ce « para- 
mètre valeur » à l’intérieur du pavé n’a d’effet 
sur le paramètre réel transmis depuis le point 
d’appel. 

e La valeur transmise peut être une expression 
de type correction. 


De base à base 


Le programme ValeurBase illustre l’utilisation 
des procédures avec paramètres de valeur. On 
peut prendre n'importe quelle base, 

de 2 (binaire), à 16 (hexadécimale). Les nombres 
décimaux saisis au clavier sont affichés selon 
la notation appropriée. Par exemple 32767 — 
Maxnt sur plusieurs petits compilateurs PASCAL — 
devient 7FFF en hexadécimal, 111111111111111 
en binaire, ou 77777 en notation octale. 
Essayez les modifications suivantes : 

* Pour assurer la représentation négative, nous 
devons convertir le nombre dans son 
complément à 2. Niveau machine, cela signifie 
lui affecter un signe négatif et ajouter 1. 
Pouvez-vous penser à un moyen simple de le 
faire en PASCAL ? 

* Peut-être voulez-vous effectuer les 
conversions d’une autre manière? Vous pouvez 
utiliser le programme comme modèle de 
conversion d’un nombre donné dans une base 
quelconque (de 2 à 16), en décimal. Vous 
pourriez incorporer cette procédure dans le 
programme ci-dessous. On vous donne une clé : 
pensez aux données et à l'édition des liens. 


PROGRAM VaieurBase ( entrées, sorties); 
convertit les nombres décimaux 
selon n'importe  auelle base 
depuis le binaire jusau’ à l'hex.} 


Colonnes = 79; par écran/imerimante} 


octet = 0...255: 
cardinal = @...MaxInt: 


nombres 
base : entier: 
Plein» 
légal : booléeni 
fitit1111111111111111111111111111} 
PROCEDURE EcrireChiffre (€ chiffre 3: octet ):5 
jvaieur de liste [compte] donné 


au chi ffre} 


BEGIN 


IF chiffre IN [@ .. 9] 
THEN 
write ( chiffre : 1 ) 
ELSE {écrit de A .. F} 
CASE chiffre OF 
18 write ( "A 
11 write € 'B’ 
write € "C' 
write € D’ 


Naturellement, toute déclaration de procédure 
doit lister les paramètres réels de l’appel et en 
outre correspondre exactement en nombre, ordre 
et type à la liste des paramètres formels de 
l'en-tête. 

Le mécanisme de transmission d’une valeur de 
paramètre peut être considéré comme l’initiali- 
sation de l’identificateur du paramètre formel à 
la valeur spécifiée dans la déclaration d’appel. 
Ainsi : 


Lignes (succ{N +interligne)DIV 2} 


suppose l’instruction suivante d’affectation dès 
l’accès à Lignes : 


NombLignes: = succ{N + interligne)DIV2 


14 5 write ( "E' )3 
15 : write C 'F’ )3 
END CASE! 
END; EcrireChiffre 
11111111111111111111111111111111 
PROCEDURE Print ( n : cardinal: 
base : octet ): 
CONST ces données sont locales à Print} 
ChiffresMax= 32; 
TYPE 
limites = 1 .. ChiffresMax: 
VAR 
list +:  TABLEAU C'iimites 1] OF octet: 
index 3 limites: 
compte : octeti 
BEGIN 
compte := @; 
REPEAT 
compte = succ ( compte ): 
liste [compte] := N MOD base; 
N := NDIV base 
UNTIL N = @; 
affichez en premier MSB 1} 
FOR compte := compte DOWNTO 1 DO 
EcrireChiffre ( liste [compte] ) 
END; Print} 
11111111111111111111111111111111 
BEGIN VaieurBase - Prosramme Principal 
REPEAT 
Writeln € ‘choissisez un nombre pour 
la base : ? )3 
Writeln Ç' 2... 16 * : Colonnes ): 
Writeln € ‘(tout autre avorte l’exé- 
cution)' : Colonnes ): 
write ( "Base ? * )3 
read ( base ): 
lesal := base IN C2 .. 16] : 
IF iesai THEN 
BEGIN 
write € "Nombre (@ chanse de 
base) 7? " )3 
read ( nombre )3 
Plein := nombre<= D 
WHILE NOT Piein DO 
BEGIN 
write € nombre : Colonnes 
DIV 2, ‘ vers la base 
3 1 * est ” ): 
PRINT (€ nombre, base )3 
Writelns 
write € "Nombre 7? ” )3 
read ( nombre )3 
Plein := nombre <= @; 
END 


END 
UNTIL NOT lesal 
END. 
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